Fix previous change.

diff --git a/lisp/loadup.el b/lisp/loadup.el
index e6b790691a0710647b6748368ab9c612aa2daae8..cd626ec1938e82c7d5e5577932676d27fbce8456 100644 (file)
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -153,7 +153,7 @@
     (let* ((base (concat "emacs-" emacs-version "."))
           (files (file-name-all-completions base default-directory))
           (versions (mapcar (function (lambda (name)
-                                        (string-to-int (substring name (1+ (length base))))))
+                                        (string-to-int (substring name (length base)))))
                             files)))
       (setq emacs-version (format "%s.%d"
                                  emacs-version